
***************
** Tables S4-S6
***************

* Open data
use "DataFinal.dta", replace



***********************************************
** Sub-Group Results - Tables [Political Trust] 
***********************************************

* Procedural fairness
* Model 1 - Low trust
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m1
* Model 2 - Low trust
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m2
* Model 3 - Low trust
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m3
* Model 7 - High trust
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m7
* Model 8 - High trust
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m8
* Model 9 - High trust
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m9

* Decision acceptance
* Model 4 - Low trust
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m4
* Model 5 - Low trust
reg decacc i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m5
* Model 6 - Low trust
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,0,5) 
estimates store m6
* Model 10 - High trust
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m10
* Model 11 - High trust
reg decacc i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m11
* Model 12 - High trust
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(poltrust,6,10) 
estimates store m12



******************************************
** Sub-Group Results - Tables [Importance]
******************************************

* Procedural fairness
* Model 1 - Low importance
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m1
* Model 2 - Low importance
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m2
* Model 3 - Low importance
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m3
* Model 7 - High importance
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10)
estimates store m7
* Model 8 - High importance
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10) 
estimates store m8
* Model 9 - High importance
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10)
estimates store m9

* Decision acceptance
* Model 4 - Low importance
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m4
* Model 5 - Low importance
reg decacc i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m5
* Model 6 - Low importance
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,0,5)
estimates store m6
* Model 10 - High trust
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10)
estimates store m10
* Model 11 - High importance
reg decacc i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10)
estimates store m11
* Model 12 - High importance
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & inrange(importance,6,10)
estimates store m12



***************************************************
** Sub-Group Results - Tables [Preference Strength] 
***************************************************

* Procedural fairness
* Model 1 - Weak preference
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m1
* Model 2 - Weak preference
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m2
* Model 3 - Weak preference
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m3
* Model 7 - Strong preference
reg fair i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m7
* Model 8 - Strong preference
reg fair i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m8
* Model 9 - Strong preference
reg fair i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m9

* Decision acceptance
* Model 4 - Weak preference
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m4
* Model 5 - Weak preference
reg decacc i.caFollowed i.caNotFollowed i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m5
* Model 6 - Weak preference
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 0
estimates store m6
* Model 10 - Strong preference
reg decacc i.ca i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m10
* Model 11 - Strong preference
reg decacc i.caFollowed i.caNotFollowed i.ref  if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m11
* Model 12 - Strong preference
reg decacc i.caFollowed##i.ref caNotFollowed##i.ref if haspos == 1 & comprehension_passed == 1 & speeder == 0 & strongpos == 1
estimates store m12

